home *** CD-ROM | disk | FTP | other *** search
/ PC Media 3 / PC MEDIA CD03.iso / share / jdos / superg21 / superg.bas (.txt) < prev    next >
Encoding:
GW-BASIC  |  1992-04-24  |  5.6 KB  |  141 lines
  1. 10  COLOR 15,0,1
  2. 20  PRINT ""
  3. 30  PRINT ""
  4. 40  PRINT "                          S  u  p  e  r   G  a  m  e  s"
  5. 50  PRINT ""
  6. 60  PRINT "                          V  e  r  s  i  o  n   2  .  1"
  7. 70  PRINT ""
  8. 80  PRINT "                      Copyright (C) 1992 Lightning Software"
  9. 90  PRINT ""
  10. 100  PRINT "                               All Rights Reserved"
  11. 110  PRINT ""
  12. 120  PRINT "                      Coded And Written By Robert L. Folmer"
  13. 130  PRINT ""
  14. 140  PRINT "           **********************************************************"
  15. 150  PRINT "           *                                                        *"
  16. 160  PRINT "           * This product is shareware and as such you may copy and *"
  17. 170  PRINT "           * distribute this program freely. Providing that all     *"
  18. 180  PRINT "           * original documentation and files are included. The     *"
  19. 190  PRINT "           * program may NOT be modified in any way without the     *"
  20. 200  PRINT "           * express written permission of the author.              *"
  21. 210  PRINT "           * You are encouraged to distribute this program to       *"
  22. 220  PRINT "           * others, so long as all files included in the original  *"
  23. 230  PRINT "           * archive are distributed as part of this program.       *"
  24. 240  PRINT "           *                                                        *"
  25. 250  PRINT "           **********************************************************"
  26. 260  PRINT ""
  27. 270  INPUT "                            Press (ENTER) To Continue!",B$
  28. 280  CLS
  29. 290  COLOR 15,5
  30. 300  PRINT "Super Games is shareware, you are granted a limited license to use   "
  31. 310  PRINT "this product not to exceed 30 days. After which you must register    "
  32. 320  PRINT "the program with the author. Registration is easy just use the       "
  33. 330  PRINT "included file REGISTER.FRM to register your copy. Upon registering   "
  34. 340  PRINT "you will receive the latest version of Super Games on your choice    "
  35. 350  PRINT "of 5 1/4 or 3 1/2 disks, 3 additional games NOT included in the      "
  36. 360  PRINT "shareware version which includes Vigilante, Digger and               "
  37. 370  PRINT "The Wizards Castle. Also registering will entitle you to free        "
  38. 380  PRINT "product updates should it become necessary. Registration is only     "
  39. 390  PRINT "$10.00 and it gives you more than all other shareware programs       "
  40. 400  PRINT "of similar value.                                                    "
  41. 410  PRINT "Please send all registrations to.....Lightning Software              "
  42. 420  PRINT "                                     2669 Lantern Trail              "
  43. 430  PRINT "                                     Lithia Springs Ga, 30057        "
  44. 440  PRINT "                                                                     "
  45. 450  INPUT "                    Press (ENTER) To Continue!                       ",B$
  46. 460  COLOR 15,0,8
  47. 470  CLS
  48. 480  PRINT "                             Super Games Version 2.1"
  49. 490  PRINT "                      Copyright (C) 1992 Lightning Software"
  50. 500  PRINT "                      _____________________________________"
  51. 510  PRINT ""
  52. 520  PRINT "                      (1)--->Bloxster      (2)--->Pitfall"
  53. 530  PRINT ""
  54. 540  PRINT "                      (3)--->Vigilante     (4)--->Digger"
  55. 550  PRINT ""
  56. 560  PRINT "                            (5)--->The Wizards Castle"
  57. 570  PRINT ""
  58. 580  PRINT "                      _____________________________________"
  59. 590  PRINT ""
  60. 600  PRINT "                           (6)--->High Scores Wanted!!!"
  61. 610  PRINT ""
  62. 620  PRINT "                           (7)--->Drop To DOS (Shell)"
  63. 630  PRINT ""
  64. 640  PRINT "                           (8)--->Exit (Return To DOS)"
  65. 650  PRINT ""
  66. 660  PRINT "                      _____________________________________"
  67. 670  PRINT ""
  68. 680  PRINT ""
  69. 690  COLOR 31
  70. 700  PRINT "       Please Choose An Option Above By Typing The Number Of The Menu Item"
  71. 710  ANS$=INKEY$: IF ANS$=""THEN 710
  72. 720  IF ANS$="1" THEN 800
  73. 730  IF ANS$="2" THEN 850
  74. 740  IF ANS$="3" THEN 900
  75. 750  IF ANS$="4" THEN 950
  76. 760  IF ANS$="5" THEN 1000
  77. 770  IF ANS$="6" THEN 1050
  78. 780  IF ANS$="7" THEN 1200
  79. 790  IF ANS$="8" THEN 1250
  80. 800  COLOR 15,0,0
  81. 810  CLS
  82. 820  PRINT "Shelling To DOS And Loading Bloxster Please Wait!....."
  83. 830  SHELL "BLOXSTER"
  84. 840  GOTO 460
  85. 850  COLOR 15,0,0
  86. 860  CLS
  87. 870  PRINT "Shelling To DOS And Loading Pitfall Please Wait!....."
  88. 880  SHELL "PITFALL"
  89. 890  GOTO 460
  90. 900  COLOR 15,0,0
  91. 910  CLS
  92. 920  PRINT "Sorry! Vigilante Is Only Available In The Registered Version."
  93. 930  PRINT "See REGISTER.FRM For Instructions On Registering Your Copy!"
  94. 940  INPUT "Press (ENTER) To Return To Menu.....",B$:GOTO 460
  95. 950  COLOR 15,0,0
  96. 960  CLS
  97. 970  PRINT "Sorry! Digger Is Only Available In The Registered Version."
  98. 980  PRINT "See REGISTER.FRM For Instructions On Registering Your Copy!"
  99. 990  INPUT "Press (ENTER) To Return To Menu.....",B$:GOTO 460
  100. 1000  COLOR 15,0,0
  101. 1010  CLS
  102. 1020  PRINT "Sorry! The Wizards Castle Is Only Available In The Registered Version."
  103. 1030  PRINT "See REGISTER.FRM For Instructions On Registering Your Copy!"
  104. 1040  INPUT "Press (ENTER) To Return To Menu.....",B$:GOTO 460
  105. 1050  COLOR 14,0,0
  106. 1060  CLS
  107. 1070  PRINT "                     High Scores Wanted!!!"
  108. 1080  COLOR 10,0,0
  109. 1090  PRINT "If you have succeeded in getting a high score, send it in to"
  110. 1100  PRINT "Lightning Software! Every month Lightning Software will take"
  111. 1110  PRINT "the top score and print it in the monthly Newsletter! Not only"
  112. 1120  PRINT "that but if you are selected you will also receive FREE the"
  113. 1130  PRINT "complete registered version of this program!"
  114. 1140  PRINT "Here's how you do it!.....Just follow the instructions in the"
  115. 1150  PRINT "SUPERG21.DOC file under High Scores Wanted!"
  116. 1160  PRINT "And let the best score win! Goodluck!!!
  117. 1170  PRINT ""
  118. 1180  INPUT "              Press (ENTER) To Return To Menu",B$
  119. 1190  GOTO 460
  120. 1200  COLOR 15,0,0
  121. 1210  CLS
  122. 1220  PRINT "Enter Exit To Return To Super Games"
  123. 1230  SHELL
  124. 1240  GOTO 460
  125. 1250  COLOR 15,0,0
  126. 1260  CLS
  127. 1270  PRINT "Are You Sure You Want To Quit (Y/N)?"
  128. 1280  ANS$=INKEY$: IF ANS$=""THEN 1280
  129. 1290  IF ANS$="Y" THEN 1330
  130. 1300  IF ANS$="y" THEN 1330
  131. 1310  IF ANS$="N" THEN 1370
  132. 1320  IF ANS$="n" THEN 1370
  133. 1330  CLS
  134. 1340  PRINT "Thanks For Using Super Games Version 2.1!"
  135. 1350  PRINT "Super Games Support BBS (404) 739-1216 24 Hours."
  136. 1360  SYSTEM
  137. 1370  CLS
  138. 1380  PRINT "Well Then Don't Say That You Do!"
  139. 1390  INPUT "Press (ENTER) To Return To Menu",B$
  140. 1400  GOTO 460
  141.